home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / pctj0687.arc / ASKDEMO.BAT next >
DOS Batch File  |  1987-04-21  |  471b  |  24 lines
  1. REM ASKKEY test
  2. ECHO OFF
  3. :GETKEY
  4. ASKKEY Press Y or N  
  5. Rem Error if above 'Y'
  6. IF ERRORLEVEL 90 GOTO ERROR
  7. Rem Ok if = 'Y'
  8. IF ERRORLEVEL 89 GOTO YES
  9. Rem Error if Above 'N', below 'Y'
  10. IF ERRORLEVEL 79 GOTO ERROR
  11. Rem OK if = 'N'
  12. IF ERRORLEVEL 78 GOTO NO
  13. Rem Else fall into error 
  14. :ERROR
  15. ECHO  Wrong key pressed. Try again
  16. GOTO GETKEY
  17. :YES
  18. ECHO  Option "YES" was selected
  19. GOTO EXIT
  20. :NO
  21. ECHO  Option "NO" was selected
  22. :EXIT
  23. ECHO ASKKEY test completed.
  24.